R Notebook

library(ggplot2)
library(plotly)

p <- ggplot(iris, aes(Sepal.Length, 
                      Sepal.Width, colour = Species)) +
  geom_point()

ggplotly(p)